* please note that the variable in the dataset called "startup" is identical to SUBOANW in source GEM data 

* also if you create graphs based on this data, some points may come as slightly shifted compared with our paper ///
* (for graphs in the paper we used all available information, while this is a much smaller dataset without missing values)

xtset country_year

* NEW VARIABLES

gen age_sq = age^2
label variable age_sq "Age squared"

gen byte SUYR5JOB_10m = 0
replace SUYR5JOB_10m = 1 if SUYR5JOB>9  & SUYR5JOB != . & startup == 1
replace SUYR5JOB_10m = . if SUYR5JOB == . & startup==1

* new female variable
gen byte female = 0-male
replace female = female+1
label variable female "Female"

* ineractive terms
gen l_hfgov_fe = l_hfgov*female
label variable  l_hfgov_fe "Gov. size (rev.) x Female"
gen l_excon_fe = l_exconst*female
label variable l_excon_fe "Constraints on exec x Female"
gen free_move_fe = free_move*female
label variable  free_move_fe "Freedom of move x Female"
gen violence_fe = violence_wom*female
label variable  violence_fe "Violence x Female"
gen mater_lea_fe = mater_leave*female
label variable  mater_lea_fe "Maternity leave x Female"
gen childcare_fe = childcare*female
label variable  childcare_fe "Childcare x Female"

label variable free_move "Restricted women freedom of movement"

gen gemwork_fe = gemwork*female
label variable gemwork_fe "In employment x Female"

* SBE REVISION - WITH RANDOM INTERCEIPTS

set more off
* benchmark = EQUATIONS 1 & 2
xi: xtprobit startup age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum l_hfgov l_exconst l_dgdp l_gdp_pc_ppp i.year, i(country_year)
xi: xtprobit SUYR5JOB_10m age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum l_hfgov l_exconst l_dgdp l_gdp_pc_ppp i.year, i(country_year)
* interactive effects with exec and size, both effects at the same time = EQUATIONS 3 & 4
xi: xtprobit startup age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum l_hfgov l_exconst l_hfgov_fe l_excon_fe l_dgdp l_gdp_pc_ppp i.year, i(country_year)
xi: xtprobit SUYR5JOB_10m age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum l_hfgov l_exconst l_hfgov_fe l_excon_fe l_dgdp l_gdp_pc_ppp i.year, i(country_year)
* all macro = EQUATIONS 5 & 6
xi: xtprobit startup age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum l_exconst l_hfgov childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year, i(country_year)
xi: xtprobit SUYR5JOB_10m age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum l_exconst l_hfgov childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year, i(country_year)
* without gov and exec = EQUATIONS 7 & 8
xi: xtprobit startup age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year, i(country_year)
xi: xtprobit SUYR5JOB_10m age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year, i(country_year)
* without gov and exec maternity-female = EQUATIONS 9 & 10
xi: xtprobit startup age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year mater_lea_fe, i(country_year)
xi: xtprobit SUYR5JOB_10m age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year mater_lea_fe, i(country_year)
* without gov and exec childcare-female = EQUATIONS 11 & 12
xi: xtprobit startup age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year childcare_fe, i(country_year)
xi: xtprobit SUYR5JOB_10m age age_sq female gemwork educ_secpost educ_post busang_dum omestb_dum knowent_dum fearfail_dum childcare mater_leave free_move violence_wom l_dgdp l_gdp_pc_ppp i.year childcare_fe, i(country_year)